Mailing Label 
Say RENEW? 


If your mailing label says 
RENEW, your subscription 
is about to expire! To 
avoid missing your next 
free issue of 
Product Profiles, renew 
IMMEDIATELY by filling 
out and returning the front 
cover coupon for a free 
subscription! The last two 
digits of your mailing label 
indicate the number of the 
last issue you'll receive. 


Pragma’s Product Profit 

is published periodically by — 
Semaphore Corporation, 

207 Granada Drive, Aptos, CA 95003, 
(408) 688-9200. 

Entire contents copyright © 1988 by 
Semaphore Corporation. 

All rights reserved. No part of this 
publication may be reproduced in any 
form or by any means without prior 
written permission from Semaphore. 
Semaphore offers no warranty, either 
express or implied, for any losses due to 
the use of any material published. 

Subscriptions are free, but are available 
only to Pick users with USA mailing 
addresses. Semaphore cannot be 
responsible for lost issues or issues 
returned to us because of address 
changes. 

All material received will be considered 
for publication. Semaphore reserves the 
right to edit all submittals. 

Pick is a trademark of Pick Systems. 
Semaphore Corp. is not affiliated with 
Pick Systems. 


Pragma's Product Profiles 
207 Granada Drive 
Aptos , CA 95003 




Pragma's Product PrCales 
is completely FREE! 


Company _ 

Address_ 

City/State _ 
Telephone. 


I use the Pick operating system and my mailing address is in the USA. 
Please continue sending me Pragma's Product Profiles free of charge. 

Signature_ Date_ 


Return this form to: 

Pragma • 207 Granada Drive • Aptos, CA 95003 


BULK RATE 
U.S. POSTAGE 
PAID 

APTOS, CA 95003 
Permit No. 67 


Address Correction Requested 









A Software Alarm Clock 

Let’s design a set of programs that will wake 
up and remind us about things we don’t want to 
forget. 

We’ll begin with a program called REMIND 
that will let us record something that needs to be 
remembered, and when we should be reminded of 
it. If we type REMIND 5/4 2:30 DENTIST 
APPOINTMENT AT 3, then we want the system to 
remind us at 2:30 on May 4th about our 
appointment. Leaving off the date, as in REMIND 
4:45 GROCERIES ON WAY HOME, should imply 
the current date, unless the specified time has 
already passed, in which case tomorrow is 
implied. 

The REMIND proc can be 

PQ 

HRUN BP REMIND 
P 

to invoke the REMIND program, which can use a 
PROCREAD to retrieve the date, time, and message 
line, and then break out those components with the 
FIELD function. Here’s the beginning of the 
REMIND program: 


PROCREAD LINE ELSE STOP "Use proc!" 

IDATE = ICONV(FIELD(LINE," ",2),"D") 

IF IDATE = "" THEN T = 2 ELSE T = 3 
ITIME = ICONV(FIELD(LINE," ",T),"MT") 

POS = COL2() 

MSG = TRIM(LINE[POS+l,LEN(LINE)-POS]) 

Once ITIME is known, IDATE can be 
adjusted as necessary with 

IF IDATE = "" THEN ;* Date not given 
IF ITIME > TIMEO THEN ;* In future 
IDATE = DATE() ;* So assume today 
* Else assume tomorrow 
END ELSE IDATE = DATE()+1 
END ; * Else assume date was givei^ 

On our machine, an ICONV with a D 
conversion returns the null string for a date string 
it can’t figure out, while an MT conversion never 
fails to return at least a zero. That means that 
REMIND can assume the user left out the date if 
IDATE is null, but more sophisticated pattern 
matching will have to be used to make REMIND 
detect when the user forgets to input a valid time. 
(Or should it be acceptable to leave reminders 
with a date but no time?) Also, watch out for time 
values that can be mistaken for and converted into 


valid dates. For now, we’ll just have REMIND 
announce the date and time it thinks the user 
specified, and let the user determine if the time is 
wrong: 

PRINT OCONV(IDATE,"D2-"):" ": 

PRINT OCONV(ITIME,"MTS")”:MSG 

Once the REMIND program knows the date, 
time, and message, it needs to save that 
information for when the reminder needs to be 
announced. We’ll have REMIND finish by saving 
the message in a file called REMINDERS: 

OPEN "REMINDERS" ELSE 
STOP "No REMINDERS!" 

ACCT = SYSTEM(19) 

WRITE MSG ON 

ACCT:" ":TIME():" ":IDATE:" ":ITIME 

On our machine, SYSTEM (19) returns the 
current account name. Other implementations 
may have to use something like 
FIELD(OCONV("","U50BB")," ",2) 
instead. Note that the WRITE allows any number 
of reminders to be saved for a given future 
moment, since the use of the TIME () function 
effectively generates unique ids for multiple items 
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saved under the same account, date, and time 
(assuming the user doesn’t save reminders faster 
than one per second). 

Now that messages are being saved in 
REMINDERS, we need a way to actually remind 
users at appropriate times. We’ll use a proc called 
STANDBY that periodically checks for items in the 
REMINDERS file. If any are there, the proc calls a 
program named ANNOUNCE to find a “past due” 
reminder and convert it into a MSG command so 
the reminder can be sent to its originator. If 
REMINDERS doesn’t have any past due messages, 
the proc just goes to sleep for awhile. 

The code for ANNOUNCE is: 

OPEN "REMINDERS" ELSE 
STOP "No REMINDERS!" 

PROCWRITE "" 

100 READNEXT ID ELSE STOP 
IDATE = FIELD(ID," ",3) 


IF IDATE <= DATE() THEN 
ITIME = FIELD (ID," '",4) 

IF ITIME <= TIMED THEN 
ACCT = FIELD(ID," ",1) 

READ MSG FROM ID ELSE MSG = "" 

DELETE ID 

PROCWRITE "MSG ":ACCT:" NOTE: ":MSG 
STOP 
END 
END 

GOTO 100 

ANNOUNCE takes an item created by 
REMIND and either ignores it (and leaves the proc 
buffer null) because the message’s due date and 
time are still in the future, or it creates an 
appropriate MSG command in the proc buffer 
because it’s time for the reminder to be sent. 

The STANDBY proc begins by selecting all 
reminders, oldest first: 


PQ 

10 HSSELECT REMINDERS BY DATE BY TIME 

STON 

H< 

P 

HRUN BP ANNOUNCE 
P 

IF # A GO 30 
20 A\ 

H 

C Above line is H followed by a blank! 
IF A GO 20 
P 

GO 10 

30 HSLEEP 60 
P 

GO 10 

Note that the SSELECT requires 
REMINDERS dictionary words called DATE and 
TIME to extract the third and fourth blank- 


B-trees for Fck systems. 


waiting for your computer to SORT or SELECT your large data 
files? Need to quickly find any attribute? Want to scroll files up or down, in 
any sort order? With B-TREE-P you can instantly search, sort, and scroll any 
data from any file! 

Now you can instantly look up customers by name, street. Zip code, or 
any other field — not just by customer number. Now you can immediately 
find inventory entries by quantity, cost, or description — not just by part 
number. Whatever files you use, now you can instantly locate and display 
your data any way you want, without having to wait for endless SORTs and 
SELECTS. 

Immediately display any record in any file just by typing one or more 
starting characters that match any field in the record. You can display not 
only a selected record, but also any previous and next records, using any 
sort order you specify. You can jump to any record in a file at any time, 
then browse through the file by scrolling up or down, a record at a time or a 
page at a time, in any sort order. 

As one of Semaphore's programmers says: "We often ask ourselves 
why we waited so long to create B-TREE-P. After using it for our own 
production work, we wonder how we ever got by before without it. A Pick 
computer without B-TREE-P is like a car without wheels' 

B-TREE-P is a proven collection of BASIC subprograms for using B-trees 
on your computer system. B-trees allow any of the data in any of your files 
to be instantly located and displayed in any sort order, without having to 
wait for SORT or SELECT commands. 

B-TREE-P and a few optional minor modifications to your existing data 
entry programs are all that is necessary for you to immediately be able to 
search, browse, display, or print your data quickly and conveniently. 
Modifications to your existing data files are absolutely unnecessary! 

Here are a few of the ways our customers have put B-TREE-P to work: 

• Within minutes of loading the B-TREE-P source code, one of our first 
customers began using B-TREE-P's standard “browser" for searching a 
120,000+ record customer master file. Any name, company, or address can 
immediately be located and displayed, just by typing one or more 
characters that match the field. No more waiting for SELECTs! 

• Another customer has set up B-TREE-P for purchase order inquiries. A 
file of multivalued line items and submultivalued delivery dates and 
quantities can instantly be viewed by item or by date. Pages can be 
scrolled at the terminal, forward or backward. Any range of data can be 




^®istantly printed. No more waiting for SORTs! 

• A California county jail uses B-TREE-P for inmate cash accour 
Although cash records are filed by inmate booking numbers, B-TREE-P allows 
a list alphabetized by the name attribute to be displayed at all times, even 
as records are created and deleted at other terminals. Any inmate record 
(or nearest match) can be immediately found and displayed just by typing 
one or more characters in a name. 

• A manufacturer uses B-TREE-P to let marketing personnel instantly 
display sales orders six different ways: by part, by description, by ship date, 
by sales rep, by customer name, and by sales territory. With just a few 
keystrokes, operators can instantly display records under a new sort (subsorts 
too) or find and output a given item. 

B-TREE-P includes all necessary BASIC source code for a B-tree system 
that works with any file. Included are an insertion subroutine, deletion 
subroutine, lookup subroutine, previous/next subroutine, and complete 
instructions. Plus, you receive the source code for a complete 
demonstration system that uses B-TREE-P to maintain a name and address 
file, including an editor program for creating and changing name and 
address records, a browser program for displaying records, and a printer 
program for listing file items in order without having to wait for a sort. 


To order, send your name, address, telephone 
number, and your check for $395 (plus tax in 
California) payable to Semaphore Corp. at 
207 Granada Drive, Aptos, CA 95003. Or call 
us at (408) 688-9200 for more information or to 
place a COD order. We'll send you complete 
B-TREE-P source code and all necessary 
documentation, along with all back issues of 
our special B-tree newsletter. 


B-TREE-P includes a license agreeement limiting your use of B-TREE-P to one computer at a time. Multi-CPU 
and OEM resale agreements are also available. Pick is a trademark of Pick Systems. 
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Questions Most Frequently Asked 

About STRIDE/Z 

1. What is STRIDE/Z? 

STRIDE/Z is an integrated package of manufacturing software for General 
Automation Zebra computers using the Pick operating system. STRIDE/Z is a 
product of Semaphore Corporation. 


2. What software is included in the STRIDE/Z package? 

STRIDE/Z includes 18 modules to automate every aspect of a 
manufacturing company: accounts payable, accounts receivable, cost 
accounting, customer service, engineering, fixed assets, general ledger, 
inspection, order entry, payroll, personnel, production control, programming, 
purchasing, receiving, shipping, shop floor, and stock room. The production 
control module includes regenerative Materials Requirement Planning. 

STRIDE/Z consists of approximately 200 programs, 350 procs, 80 formatted 
screens, 655K bytes of online user documentation, and 225K bytes of online 
programmer cross reference documentation. The approximately 100 files in 
STRIDE/Z require 2.5 million bytes of disk space for installation. STRIDE/Z uses no 


a^mbler code. 

3. Why is STRIDE/ 


jTRIDE/Z works. It was 


than other manufacturina oackaaes? 


'actual electronics manufacturer 


J |jpm scratch over a two year perio<^pt 
, era sales climbed from $10 million to over 


$20 million. 


STRIDE/Z has a clean, modular well-structured, and conceptually integrated 
design. All design and implementation work was the effort of an individual 
programmer. Unlike other large software products, STRIDE/Z is not a collection 
of ad hoc patches and multiple programming styles. 

STRIDE/Z simultaneously and correctly updates multiple files as soon as 
transactions are entered, in order to provide a database that is always up to 
date, and to avoid unfriendly batch-style processing. 

STRIDE/Z is well-documented, especially for the programmer. Extensive 
cross-references carefully document all program, proc, and data 

interdependencies, so that modifications 
. are easy and predictable. 

II 1 And STRIDE/Z is inexpensive. 

4. How can I find out more about STRIDE/Z? 

Call or write Semaphore Corporation, 

207 Granada Dr., Aptos, CA 95003, 

(408) 688-9200. 





The Pick Mailing List 

CREAM of the CROP 

The 3,000 most responsive Pick users' names and 
addresses. Only $150 plus tax for one-up adhesive 
labels, sorted, printed, and delivered. Send no 
payment without first obtaining our order form and 
one-time use agreement. 

P Mail by Marianne • 1893 Nadina St. • Seaside CA 93955 


Semaphore Corporation welcomes its 
newest B-TREE-P customers: 

Kilo MicroAir 

Diversified Computer Systems 


delimited chunks out of that file’s item ids. On our machine, the 
H< guarantees RUN BP ANNOUNCE is executed whether or not any 
items are actually selected. 

If ANNOUNCE doesn’t create a MSG command, the proc goes 
to sleep for awhile at label 30 and tries a SSELECT again later. 
But if ANNOUNCE does put a MSG in the proc input buffer, it’s 
moved word by word to the output buffer, executed, and another 
SSELECT is immediately attempted. 

To make the system work, just leave the STANDBY proc 
running on any port (real or phantom). Any account can then use 
the REMIND program to leave a reminder in the REMINDERS file. 
When the time comes, the ANNOUNCE program will delete it from 
REMINDERS, and STANDBY will send it back to the account. 

A few improvements to the system may be desirable. Note 
that the account to receive the reminder may not even be logged 
on, or may not notice the message. Maybe reminders should be 
periodically rebroadcast and not deleted until the account 
acknowledges receipt? (The user might simply type in 
“RECEIVED” to execute a program that actually deletes an 
account’s oldest message in the REMINDERS file, to stop 
rebroadcast.) 

A program to review, edit, or delete pending reminders might 
also be helpful. 

Another improvement would be to increase the sleep time of 
STANDBY to avoid wasting a lot of computer time. However, if 
very long sleep times like an hour are used, ANNOUNCE should 
always immediately approve any message due to be broadcast 
during the next sleep period (not just past due messages), 
otherwise the reminder may not reach the recipient until the 
reminder is far too late to be useful. 
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Four programs for connecting 
your Macs to a Zebra. 


* File Edit 

Terminal 

— 



FreeTerm 2.0 nw 


31 




5 

Logon pl«as«. SYSPROG 



> WHERE 

*000 048G 7F08 

121.000 121.1B8 



001 0420 7000 

6 18C 6 88C 392.004 5. 18C 



002 0440 2F00 

245.12ft 



003 0400 5F00 

3.21E 246.634 246.3CE 



005 04R0 3F08 

170.064 1700C8 



006 04C0 3F00 

> 

170.064 170.170 


jjjjj 





You can use FreeTerm: a simple text-only software emulator that turns your Mac 
into an ASCII terminal. There's no cursor control, but it does support X-on/X-off, 
and it's in the public domain. 


Or you can use Red Ryder: a former try-before-you-buy "shareware" product, this 
software is now a commercial offering. It supports lots of protocols, but still 
doesn't do much more than let your Mac input and display text. 


• • 



Or you can use MacTerminal: developed by Apple, this software turns your Mac 
into a complete (but slow) VT100 terminal. Still, it's only text-based, and all the 
power of your Mac goes wasted. 


Or you can use Telefolders: sophisticated software that lets you tie your Zebra 
and Macs together, without losing the point-and-click power of the Macintosh 
interface. Mac files saved on the Zebra appear as standard icons, folders, and 
windows. To copy any Mac-style program, data, or document from the Zebra to 
your Macintosh, just click on the icon you want and select “Receive" from the 
Mac's pull-down menu. Each Mac also has access to its own private folder, for 
sending and receiving electronic mail via the Zebra. 

Telefolders host software for the Zebra is $995. A starter kit of Telefolders software 
for the Macintosh is $49.95, and includes four free hours of access to Semaphore's 
own Zebra host, which features a large collection of Macintosh public domain 
software. 

To order, or to receive more information, contact Semaphore Corporation, 

207 Granada Drive, Aptos, CA 95003, (408) 688-9200. 


































New B-TREE-P installations 
are sprouting up every day! 

B-TREE-P is software 
that allows your data to 
be instantly located and 
output, without having 
to wait for lengthy file 
sorts or searches. Join 
the growing number of 
sites discovering the 
power and flexibility of 
B-TREE-P. Write or 
call Semaphore Corp., 
207 Granada Drive, 
Aptos, CA 95003, 

(408) 688-9200. 
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Sanitary Service • Bottom Line Software Inc. • Brown & Caldwell Labs • Colonial Pacific Leasing • 
Marion County Republicans • Augmented Computer Technology • Premisys • Kripalu Center • 
Rollings Homes Inc. • Computerized Data • Ultimate Corp. • Elliott-Pope School • Toyota of Irving • 
Victory Express Inc. • Compu Components • Monterey County • Butterfields • Electronic Business • 
Kreepy Krauly USA • Tennessee Mat Co. • Zircon Co. Inc. • Smithsonian Institution • Call U.S. Inc. • 
Meditech • Unison Technologies Inc. • Wavetek • Moore Industries • Systems Support Services • 
Aerojet General • Target Supply • Lilyblad Petroleum • Partners National Health Plans • M. Epstein 
Inc. • Vitek Systems Inc. • J & L Industrial Supply Co. Inc. • Century Publishing Co. • Northwest 
Agricultural Coop Assoc. • Tampa Bay Mgmt. Services Inc. • Spectradyne Inc. • Crosstern Corp. • 
Magic Chef Air Conditioning Co. • Educators Mutual Insurance • Samuelson Assoc. Co. • Anthony 
Pools • Brooks Equipment Co. Inc. • Associated Students UCLA • Laub Group Inc. • United Collection 
Bureau Inc. • Pactel Paging • Access Software Inc. • Bronson & Bratton Inc. • ACS Systems Inc. • 
Topsy’s International Inc. • Opportunities Unlimited • Glastron-Conroy Ltd. • XScribe Corp. • 
Minnesota Trade Office • Berelson Co. • San Mateo County • Creative Computer Services • 
Livermore Police Dept. • Hubert Distributing Co. • Reinsurance Assoc. • Oman Publishing • Capital 
Software Ltd. • Martin Cadillac Co. Inc. • NORPAC • AIPAC • Medical Accounting Systems • Sierra 
Software Inc. • May Trucking • Shoob Photography • Specialty Underwriters Inc. • Specs Music • 
ADDS Inc. • Excalibur Computer Systems Inc. • City of Irvine • Cornell University • Office Works • 
Assertive Systems • Conston Inc. • Wofford College • Chicago Kenworth • Eye Care & Surgery Center 
• Chandler Lumber Co. • Mark Card • Penn Independent Assoc. Inc. • Condominium Insurance • 
John Klein & Assoc. Inc. • Cooke Data Systems Inc. • Infocel • Multisystems Inc. • Generation 
Research • Miami Trading Enterprises • System Works Inc. • Flynt Systems Corp. • Life & Health 
Insurance Co. of America • Information Technology Consultants • Tel-A-Train Inc. • Data Operating 
Systems Inc. • Computyme • Stewart Co. • Trudell Trailer Sales Inc. • NCAR • Jet Electronics & 
Technology Inc. • Distributed Logic Corp. • University of California • Casualty Underwriters Inc. • 

Halprin Supply Co. • Long Beach Community Services. 
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